(fortran-strip-sqeuence-nos): Doc fix.

diff --git a/lisp/progmodes/fortran.el b/lisp/progmodes/fortran.el
index a845358a6a2a0cb7280d48dd758b870ec440eba0..d83f64763bcc90192683bf5da038251f24251427 100644 (file)
--- a/lisp/progmodes/fortran.el
+++ b/lisp/progmodes/fortran.el
@@ -1789,9 +1789,9 @@ Intended as the value of `fill-paragraph-function'."
     (fortran-indent-line)))
 
 (defun fortran-strip-sqeuence-nos (&optional do-space)
-  "Delete all text after column 72 (assumed to be sequence numbers).
-Also delete trailing whitespace after stripping such text.  Supplying
-prefix arg DO-SPACE prevents stripping the whitespace."
+  "Delete all text in column 72 and up (assumed to be sequence numbers).
+Normally also deletes trailing whitespace after stripping such text.
+Supplying prefix arg DO-SPACE prevents stripping the whitespace."
   (interactive "p")
   (save-excursion
     (goto-char (point-min))